legacy

Author: dezren39

pkgs/roc/lib/build.sh

@@ -13,7 +13,9 @@ DEFAULT_APPLICATION="hello"
 application="${APPLICATION:-$DEFAULT_APPLICATION}"
 static=0
 skip_run=0
-eval set -- "$(getopt -o "" --long platform:,app:,static,skip-run,help -- "$@")"
+linker="default" # default: surgical, options: surgical, legacy
+legacy=default
+eval set -- "$(getopt -o "" --long platform:,app:,static,skip-run,help,legacy,surgical,linker: -- "$@")"
 if [[ $# -gt 1 ]]; then
   while true; do
     case ${1:""} in
@@ -37,6 +39,18 @@ if [[ $# -gt 1 ]]; then
       skip_run=1
       shift
       ;;
+    --linker)
+      linker="$2"
+      shift 2
+      ;;
+    --surgical)
+      linker="surgical"
+      shift
+      ;;
+    --legacy)
+      linker="legacy"
+      shift
+      ;;
     --help) usage ;;
     --)
       shift
@@ -59,6 +73,12 @@ if [[ $# -gt 1 ]]; then
     esac
   done
 fi
+if [[ "$linker" = "default" ]]; then
+  linker="legacy"
+fi
+if [[ ! -z "$linker" ]]; then
+  linker="--linker=$linker"
+fi
 platform="${platform:-$DEFAULT_PLATFORM}"
 application="${application:-$DEFAULT_APPLICATION}"
 platform_path="${PLATFORM_PATH:-./platforms/${platform}}"
@@ -87,7 +107,7 @@ app_lib="$app_path/libapp.so"
 rm -f "$app_lib" 2>/dev/null || true
 app_main="$app_path/main.roc"
 # --linker=legacy
-roc build --lib "$app_main" --output "$app_lib"
+roc build $linker --lib "$app_main" --output "$app_lib"
 if [[ -d "$platform_path" ]]; then
   if [[ ! -d "$platform_roc_path/Lib" ]]; then
     if [[ -L "$platform_roc_path/Lib" ]]; then
@@ -107,10 +127,10 @@ if [[ -d "$platform_path" ]]; then
     # nix_file="./flake.nix"
     # if [[ -f "$nix_file" ]] && command -v nix && eval "nix eval --json .#devShell.x86_64-linux >/dev/null 2>&1"; then
     # --linker=legacy
-    #   nix develop --command "roc \"$roc_build_file\""
+    #   nix develop --command "roc $linker \"$roc_build_file\""
     # else
     # --linker=legacy
-    roc "$roc_build_file"
+    roc $linker "$roc_build_file"
     # fi
     if [[ -d "target/release" ]]; then
       host_bin="$platform_path/target/release/host"
@@ -131,4 +151,4 @@ if [[ -d "$platform_path" ]]; then
   roc preprocess-host "$host_bin" "$host_main" "$app_lib"
 fi
 # --linker=legacy
-((skip_run)) || roc "$app_main"
+((skip_run)) || roc $linker "$app_main"

pkgs/roc/platforms/rust-basic-cli-2/build

@@ -291,71 +291,71 @@ pub unsafe extern "C" fn roc_memset(dst: *mut c_void, c: i32, n: usize) -> *mut
 // TODO: remove all of this when we switch to effect interpreter.
 pub fn init() {
     let funcs: &[*const extern "C" fn()] = &[
-        roc_alloc as _,
-        roc_realloc as _,
-        roc_dealloc as _,
-        roc_panic as _,
-        roc_dbg as _,
-        roc_memset as _,
-        roc_fx_env_dict as _,
-        roc_fx_env_var as _,
-        roc_fx_set_cwd as _,
-        roc_fx_exe_path as _,
-        roc_fx_stdin_line as _,
-        roc_fx_stdin_bytes as _,
-        roc_fx_stdin_read_to_end as _,
+        // roc_alloc as _,
+        // roc_realloc as _,
+        // roc_dealloc as _,
+        // roc_panic as _,
+        // roc_dbg as _,
+        // roc_memset as _,
+        // roc_fx_env_dict as _,
+        // roc_fx_env_var as _,
+        // roc_fx_set_cwd as _,
+        // roc_fx_exe_path as _,
+        // roc_fx_stdin_line as _,
+        // roc_fx_stdin_bytes as _,
+        // roc_fx_stdin_read_to_end as _,
         roc_fx_stdout_line as _,
-        roc_fx_stdout_write as _,
-        roc_fx_stdout_write_bytes as _,
+        // roc_fx_stdout_write as _,
+        // roc_fx_stdout_write_bytes as _,
         roc_fx_hello as _,
-        roc_fx_stderr_line as _,
-        roc_fx_stderr_write as _,
-        roc_fx_stderr_write_bytes as _,
-        roc_fx_tty_mode_canonical as _,
-        roc_fx_tty_mode_raw as _,
-        roc_fx_file_write_utf8 as _,
-        roc_fx_file_write_bytes as _,
-        roc_fx_path_type as _,
-        roc_fx_file_read_bytes as _,
-        roc_fx_file_reader as _,
-        roc_fx_file_read_line as _,
-        roc_fx_file_delete as _,
-        roc_fx_file_size_in_bytes as _,
-        roc_fx_file_is_executable as _,
-        roc_fx_file_is_readable as _,
-        roc_fx_file_is_writable as _,
-        roc_fx_file_time_accessed as _,
-        roc_fx_file_time_modified as _,
-        roc_fx_file_time_created as _,
-        roc_fx_file_exists as _,
-        roc_fx_file_rename as _,
-        roc_fx_hard_link as _,
-        roc_fx_cwd as _,
-        roc_fx_posix_time as _,
-        roc_fx_sleep_millis as _,
-        roc_fx_dir_list as _,
-        roc_fx_send_request as _,
-        roc_fx_tcp_connect as _,
-        roc_fx_tcp_read_up_to as _,
-        roc_fx_tcp_read_exactly as _,
-        roc_fx_tcp_read_until as _,
-        roc_fx_tcp_write as _,
-        roc_fx_command_status as _,
-        roc_fx_command_output as _,
-        roc_fx_dir_create as _,
-        roc_fx_dir_create_all as _,
-        roc_fx_dir_delete_empty as _,
-        roc_fx_dir_delete_all as _,
-        roc_fx_current_arch_os as _,
-        roc_fx_temp_dir as _,
-        roc_fx_get_locale as _,
-        roc_fx_get_locales as _,
-        roc_fx_sqlite_bind as _,
-        roc_fx_sqlite_column_value as _,
-        roc_fx_sqlite_columns as _,
-        roc_fx_sqlite_prepare as _,
-        roc_fx_sqlite_reset as _,
-        roc_fx_sqlite_step as _,
+        // roc_fx_stderr_line as _,
+        // roc_fx_stderr_write as _,
+        // roc_fx_stderr_write_bytes as _,
+        // roc_fx_tty_mode_canonical as _,
+        // roc_fx_tty_mode_raw as _,
+        // roc_fx_file_write_utf8 as _,
+        // roc_fx_file_write_bytes as _,
+        // roc_fx_path_type as _,
+        // roc_fx_file_read_bytes as _,
+        // roc_fx_file_reader as _,
+        // roc_fx_file_read_line as _,
+        // roc_fx_file_delete as _,
+        // roc_fx_file_size_in_bytes as _,
+        // roc_fx_file_is_executable as _,
+        // roc_fx_file_is_readable as _,
+        // roc_fx_file_is_writable as _,
+        // roc_fx_file_time_accessed as _,
+        // roc_fx_file_time_modified as _,
+        // roc_fx_file_time_created as _,
+        // roc_fx_file_exists as _,
+        // roc_fx_file_rename as _,
+        // roc_fx_hard_link as _,
+        // roc_fx_cwd as _,
+        // roc_fx_posix_time as _,
+        // roc_fx_sleep_millis as _,
+        // roc_fx_dir_list as _,
+        // roc_fx_send_request as _,
+        // roc_fx_tcp_connect as _,
+        // roc_fx_tcp_read_up_to as _,
+        // roc_fx_tcp_read_exactly as _,
+        // roc_fx_tcp_read_until as _,
+        // roc_fx_tcp_write as _,
+        // roc_fx_command_status as _,
+        // roc_fx_command_output as _,
+        // roc_fx_dir_create as _,
+        // roc_fx_dir_create_all as _,
+        // roc_fx_dir_delete_empty as _,
+        // roc_fx_dir_delete_all as _,
+        // roc_fx_current_arch_os as _,
+        // roc_fx_temp_dir as _,
+        // roc_fx_get_locale as _,
+        // roc_fx_get_locales as _,
+        // roc_fx_sqlite_bind as _,
+        // roc_fx_sqlite_column_value as _,
+        // roc_fx_sqlite_columns as _,
+        // roc_fx_sqlite_prepare as _,
+        // roc_fx_sqlite_reset as _,
+        // roc_fx_sqlite_step as _,
     ];
     #[allow(forgetting_references)]
     std::mem::forget(std::hint::black_box(funcs));